<init>
subevent(mapinit,);
item(check:eq,r[T,1); or; item(check:eq,XP,1); or; item(check:eq,XL[,1); or; item(check:eq,̌,1); if(nowres); fc(yj,apr,=,1); else; fc(yj,apr,=,0); endif;
evflagsw(pr_ysridou,==,1); if(nowres); fc(c2,apr,=,1); endif;

subevent(sethkrbgm,);


#Pe
<to_1f>
#disptoimage; changemap(K); mapname(0); imagescl(0,0,-8,32); return; image();
fade(out,(type=fade,color=000000,wait=16)); changemap(K); mapname(0); fade(in,(type=fade,color=000000,wait=16));


#I}P
<to_omake>
#evflag(main,<,3,1,); evflag(deckbr,==,0,1,); evflag(gcseis,==,0,1,);
zukan(warppos:*all,&,omake); and; evflagsw(pr_dfmoon2,==,1); if(nowres);
fc(*actor,walkto,1,8,*target); return;
#fc(*actor,walk,1,8,1,0,0); return;
#sound(warp); fade(out,(type=fade,color=ffffff,wait=16)); fc(*actor,dir,==,u); if(nowres); fc(*actor,move,0,18,center); else; fc(*actor,move,28,18,center); endif; fc(*actor,dir,=,l); changemap(I}P); fade(in,(type=fade,color=ffffff,wait=16)); end;
sound(warp); fade(out,(type=fade,color=ffffff,wait=16)); fc(*actor,move,-14,10,center); fc(*actor,dir,=,r); fc(*actor,float,=,0); changemap(I}P); fade(in,(type=fade,color=ffffff,wait=16)); end;
else; text(1,face=uam,䂾B);
endif;


#R̎Ђ
<to_yashiro>
#zukan(warppos:*all,&,yashiro); if(nowres);
sound(sleep); fade(out,(type=fade,color=ffff00,wait=64)); fc(*actor,move,-12,-7,center); fc(*actor,dir,=,d); changemap(R̎); fade(in,(type=fade,color=ffff00,wait=64));
#endif;


#gC
<tl>
#fc(walk,*actor,1,2,1,0,0); return;
fc(*actor,apr,=,0); return;
fc(tl,move,~0,~0,); fc(tl,dir,=,~l); fc(tl,apr,=,1); wait(32); sound(return); wait(32); fc(tl,apr,=,0);
#fc(pic,,=,toilet); wait(32); sound(return); wait(32); fc(pic,,=,);
fc(*actor,apr,=,1); fc(*actor,walk,1,8,-1,0,l); return;
evflag(*inmap:tlcount,<,10); if(nowres); evflag(*inmap:tlcount,+=,1); endif;


#fbLuV
<prs_dk>
#subevent(hengehanyou,);
item(check:eq,fbLuV,1); if(nowres);
text(1,(face=+evfch,select=\n_,islc=1),uI@͓`̃fbLuVI@ŃgC̑|oI@Ă܂񂩁Hv);
#select2(reset,all); select2(+(id=0)); select2(+_); select2(/); select2(*(cid=));
if(evf(*selected)==0);
item(lost:eq,fbLuV,1); evflagsw(pr_deckbr,=,1); zukan(sysm:ex-deckbr,=,1);
text(1,face=+evfch,u肪ƂIv); getdlg(%ct2dwCxgw%sysm[*ex-deckbr]xUI%cd,all,30000000,0,0, 0,); text(4,,%str[*def]); text(1,(face=uam,swait=-1),悭̍se؂ȃCxgNA܂I\nȂ͑f炵I);
#mem(forp); member(exp,+=,2000000, 0,0); nextmem(); sound(warp); text(1,,u肪ƂIv\nel͂QŠolς񂾁I\n悭̍se؂ȃCxgNA܂I@Ȃ͑f炵I); end;
#mem(forp); member(exp,+=,5000000, 60,1); nextmem(); sound(warp); text(1,,u肪ƂIv\nel͂TS^ľolς񂾁I\n悭̍se؂ȃCxgNA܂I@Ȃ͑f炵I); end;
else; text(1,face=+evfch,u(LEցEM)ް݁ccv);
endif;
else;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,u|~ĂA|ɕϐĝ͌ˁcv);
else;
if(evf(*sw:pr_deckbr)==0); text(1,face=+evfch,ũgCA܂̉ꂪڗȂccv);
#BقȂcc
#text(1,face=+evfch,ũgC܂LˁBip[̂œ̒BȂccv);
else;
text(1,face=+evfch,ufbLuV肪ƂI@AłƂĂ肵Iv);
endif;
endif;
endif;

if(evf(*sw:pr_deckbr)==1);
text(1,face=+evfch,uAƂƓAȊOɂ𔄂Ăꏊ炵BKv͖炵ǁAꕔ͓̓A啪Aĉ\v);
zukan(warppos:*all,&,hideshop); if(nowres); text(1,face=+evfch,uȂƁA݂ˁI@̊CȂāA}`bNȂv); endif;
#text(1,face=+evfch,u\̂X݂ˁI@̊CȂāA}`bNłȂv);
#N̔qgɂȂĂAǂɎ|肪Ȃ肵ȂȁcH
#text(1,face=+evfch,uAƍxƓAȊOɂ𔄂Ăꏊ炵BKv͖炵ǁAꕔ͓̓A啪Aĉ\BN̔qgɂȂĂ肵ȂȁcHv);
#text(1,face=+evfch,uAƓAȊOɂ𔄂Ăꏊ炵BKv͖炵ǁAꕔ͓̓A啪Aĉ\Bx̒N̔qgɂȂĂ肵ȂȁHv);
#text(1,face=+evfch,uAƓAȊOɂ𔄂Ăꏊ炵BKv͖炵ǁAꕔ̃ACe͓A啪Aĉ\BA@wǂȂȂ̂ɂȂĂ邩Hv);
#text(1,face=+evfch,uAƓAȊOɂ𔄂Ăꏊ炵BKv͖ǁAꕔ̃ACéAA啪ĉ\BA@wǂȂȂ̂ɂȂĂ邩Hv);
#evflagsw(pr_hideshop,==,1); if(nowres); text(1,face=+evfch,uIH@̉FۂEɂāIH@A[Nip[̓GSSĂIH@sȋC͔oȂǃNNȂI@ĂĂ肪ƂIv); endif;
#zukan(warppos:*all,&,hideshop); if(nowres); text(1,face=+evfch,u[A݂ˁI@_z[IIv); endif;
#item(check:6,slcalerm-pl,1); if(nowres); text(1,face=+evfch,uȂƁA݂ˁI@IIv); endif;
#endif;
endif;

#fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,u͂ƁA̎pĂAƌɓ肽Ȃėcv); end; endif;
#fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,u͂ƁA̎pĂAɌɓ肽Ȃėcv); end; endif;


<prs_esc>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uip[̕ϑĐlXf킷̂͂悭Ȃcv); end; endif;
fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,upŐlXf킹Ă݂ȂcBłAƂɒRłȂƊȂˁv); end; endif;
#[AAȊAiDĂ݂񂾂ǂȂ
#[Aɂ̊iD́AႦȊłEC͏oɖȂ
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uf킳ꂻȃLmCȂv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂĂAɂ͕ῶȂ݂ˁcv); end; endif;

fcwait(*target);
text(1,face=+evfch,uvʋGɏo킵w%ct2%sk[*].nmic%cdx̂肾B肪ĐقǓȂ邯ǁAɂ%ctu΂ɓȂȂƂ͖%cdB̓Iɂ͍Œł20̊mœłƂBeؐ݌vˁIv\ruw%ctdsI%cdxɂȂĂA߂ɓĂˁBȂ킢L邯ǁAꍇ͓ƂÎłȂȂ邩炷킩BtɊmɓ킢āȀꍇ͓邪%ct2̐F%cdɂȂĂ݂v);
#AƂՂ
#x̏ꍇ́AłoɂȂB
#text(1,face=+evfch,uvʋGɏo킵w%ct2%cdx̂肾B肪ĐقǑ͂Ȃ邯ǁAm͈ȉɂ͂ȂȂBȂ킢L邯ǁAꍇ͓ƂÎłȂȂ邩炷킩v);
#𗎂ƂĂ܂邯ǁAȂčsƁAƂmčs
#ՂA̗Ƃ́AƂ肠w%ct2%cdxĐ\lւĂ炵
#text(1,face=+evfch,uvʋGɏo킵AĐ킸ɓ̂肾B肪ĐقǑ͂Ȃ邯ǁAm͈ȉɂ͂ȂȂv);
#text(1,face=+evfch,uȂ킢L邯ǁAꍇ͓鑀쎩̂ȂȂ邩炷킩BՂ͂Ƃ肠A̐mƂ̉ւĂ炵v);
#text(1,face=+evfch,uȂ킢L邯ǁAꍇ͓鑀쎩̂ȂȂ邩炷킩BՂA̗Ƃ́AƂ肠wxĐ\lւĂ炵v);


<prs_tai>
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uȒPɓ|Ă܂ȁAƗȂpˁv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,ul`݂Ȏpˁv); end; endif;
fc(*actor,pic,>=,kokeshi); and; fc(*actor,pic,<=,buzzou); if(nowres); text(1,face=+evfch,ul`킢ˁv); end; endif;
#member(head, pcond, cond,ωp,!=,0); if(nowres); text(1,face=+evfch,uv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂ񂾂ˁH@pɂ锽̕ώA擪̐l̎p݂̂eĂ݂AʂɕϐgĂꍇ͋CtĂˁv); end; endif;
#subevent(hengehanyou,);

text(1,face=+evfch,uj[́w%ct2%sysm[*form].nmic%cdxw%ct2%sysm[*slcld].nmic%cdxw%ct2%sysm[*slcgdpos].nmic%cdxĂ̂͋CɂȂĂ炵Bɂpɗ]Ȃ̂X݂Ă݂ǁAƂ肠ʓ|LȂ̂̓X[łƎvv);

select2(reset,all);
select2(+%sysm[*form]E%sysm[*slcld]ɂĂĕ(id=0));
select2(+%sysm[*gdpos]ɂĂĕ(id=1));
#select2(+ł%cdp[*vp]E%cdp[*ep]ɂĕ(id=2));
#select2(+퓬ʍEtȂH(id=3));
#select2(+Ȃ_GJEgɂĕ(id=4));
select2(+nj); select2(/);
while;
select2(*(cid=));

if(evf(*selected)==0);
text(1,face=+evfch,uړʏ퓬ʏł̕тς邯ǁA{ɋɈꕔāAڈȏ̕ω͖݂݂B擪wɂẮAړʂ̎Ȃ痧~܂āAbeL[̂Tłs݂v);
#text(1,face=+evfch,uw擪wxɂẮAړɂbeL[̂Tłs݂v);
#text(1,face=+evfch,uj[́w%ct2%cdxw%ct2擪w%cdxw%ct2q%cdxĂ̂͋CɂȂĂ݂BwxƁw擪wxł͈ړ퓬̕тς邯ǁAڈȏ̕ω͖wǖ݂Bw擪wxɂẮAړɂbeL[̂Tłs炵v);
next; endif;

if(evf(*selected)==1);
text(1,face=+evfch,u%ct2Oq%cdƂ%ct2q%cdݒ肷̂ŁAꉞ퓬ɉe邯ǁAiKȂ̂ŎgȂĘbBƂ肠NqɂƁA̐l̎󂯂_[WɁAqɂl̎󂯂_[W炵B_Ղ͕ςȂ݂v\rułSqɂĂASq̏ԂƓɂȂĂ܂݂BNlی삵ꍇ́A̐lŌqɂāȂSőOqɂ̂ԌʓIĎȁv\rue̓x͋ZɂĈႤ݂ŁAw%ct2qʉe%cdxĂ̂֌WĂƂB^_[Wɂe݂v);
#text(1,face=+evfch,uw%ct2q%cdxĂ̂͂OqƂqݒ肷̂ŁAꉞ퓬ɉe邯ǁAiKȂ̂ŎgȂĘbBƂ肠NqɂƁA̐l̎󂯂_[WɁAqɂl̎󂯂_[W炵v);
#IɉݒuĂ邾̂̂ŁAgȂđv݂BgȂBƂ肠NqɂƁA̐l̎󂯂_[WɁAqɂl̎󂯂_[W炵v);
#text(1,face=+evfch,uj[Ɂw%ct2%cdxƂw%ct2擪w%cdxĂ邯ǁAwǌڂω邾ŁA퓬ɂ͉eȂ݂B擪wɂẮAړɂbeL[̂Tłs炵v);
#text(1,face=+evfch,u퓬ɉêƂẮw%ct2q%cdxĂ̂邯ǁAɋCɂKv͖ȋCBƂ肠NqɂƁA̐l̎󂯂_[WɁAqɂl̎󂯂_[Wۂv\rułSqɂĂASq̏ԂƓɂȂĂ܂݂Be̓x͋ZɂĈႤ݂ŁAw%ct2qʉe%cdxĂ̂֌WĂƂB^_[Wɂe݂B_Ղ͕ςȂȁv);
#text(1,face=+evfch,u퓬ɉêƂẮw%ct2q%cdxĂ̂邯ǁAɋCɂKv͖ȋCBƂ肠ANOqɂĒNqɂƁAOq̐l󂯂_[WɁAq̐l󂯂_[WƂv\ruł_Ղ͕ςȂȁB^_[Wɂω݂B܂ASqɂĂASq̏ԂƓɂȂĂ܂݂Be̓x͋ZɂĈႤ݂ŁAw%ct2qʉe%cdxĂ̂֌WĂƂv);
#B܂ANlی삵ꍇ́A̐lŌqɂāA̐lSőOqɂ̂łʓIƂȁH
#q̃_[WŁAOq̓_[W邩CtĂˁB^_[Wɂ኱Ⴂo݂B_[W̑̓x͋ZɂĈႤ݂ŁAw%ct2qʉe%cdxĂ̂֌WĂƂv);
#w%ct2qʉe%cdxĂ̂[̋Zɑ΂ẮAOqq֌W݂
#\ruwqʉexĂ̂ႢZɑ΂ẮAqł܂_[W̌y҂łȂBtɁA^_[W̌yAOqł̃_[WȂȂ݂
#text(1,face=+evfch,uj[ɁwxƂw擪wxĂ邯ǁA퓬ɂ͉eȂB퓬Ɋ֌Ŵ́wʒuxB_Ղɂ͉eAɎ󂯂_[W̕ωɂȂ邯ǁAĺA_Ղĉ߂ŗǂv);
#text(1,face=+evfch,uႦΒNlی삵ꍇ́A̐lŌqɂāA̐lSőOqɂ̂łʓIBSŌqɂĂASq̏ԂƓ璍ӂĂˁBtɒNlɂꍇ́A̐lőOqA̐lSŌqB܂g@Ǝvǁcv);
next; endif;

#if(evf(*selected)==2);
#next; endif;

#if(evf(*selected)==4);
#next; endif;

wend;


<prs_slc>
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,udP[u͕tĂȂ񂾂ˁv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres);
fc(yj,apr,==,1); if(nowres); text(1,face=+evfch,u̎pAoX[ɂ悤Ȋ̉񂪗ĂˁBip[Bւ̉킩l̎ÁA񂾐l̈Ԃ߂܂łĂ邵AƂĂĂ񂾂ǁAƂȂԂߕ鎖̂ʂɏȂcv); end; endif;
text(1,face=+evfch,u̎pAoX[ɂ悤Ȋ̉񂪗̂B̌̂ƈĎQ͖݂B%pty[e]̏ꍇȀȂƉȂCv); end;
endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,u%it[*henge]āABłĝȂBłÅԈႢŌɖ߂ȂȂƎvƕ|AƎĂ݂EC͖Ȃcv); end; endif;
#subevent(hengehanyou,);

text(1,face=+evfch,uj[Ȃǂ̑Iʂ́A㉺E[vĂBႦ΁Aԏ̏ōXɏֈړ悤ƂƁAԉ֔ԂBSĂƁAIɊ|鎞Ԃ\ߖłv\ru]kǁA@\肵悤Ǝvꍇ́Aw%ct2]%cdxĂ̂gƊyɍςޏꍇB́w%ct2Z̗]%cdx̂ƂBႦ΁AUɑ΂ĂTŏ]ƁAUTŊ]A܂PɂȂv\ruđIT̏ꍇ́AwP𑫂ĂTŏ]xɂăJ[\i߁AwS𑫂ĂTŏ]xɂăJ[\߂ƁAlO`S̊Ԃ肭[vĂBP`TƂɂ悤ƂƂGɂȂ邯ǁv);
#B]đɂp͈͂LA\
#\ru_vfœ̂QAŋN̂̂ɂLpBvf̂ނT̏ꍇAP`S̗𔭐āAO̗vfɑΉlɉZAĂTŏ]AƂ΁AႦΑO񂪂QꍇȂAOAPARASoėv
#text(1,face=+evfch,uj[Ȃǂ̑I̎ɁA܂́ƉĂ݂āBJ[\ԏɍsԉɁAԉɍsԏɖ߂B㉺[vĂ銴ˁBlɍE[vĂBSĂƁAIɊ|鎞Ԃߖłv\ru]kǁA@\蓮Ŏ悤Ǝvꍇ́Aw]xĂ̂gƊyɍςޏꍇBႦΑIT̏ꍇ́AwP𑫂ĂTŏ]xɂăJ[\i߁AwS𑫂ĂTŏ]xɂăJ[\߂ƁAlO`S̊Ԃ肭[vĂv);
#text(1,face=+evfch,uj[Ȃǂ̑I̎ɁAJ[\ԏXɏֈړ悤ƂƁAԉɖ߂BtɈԉֈړ悤ƂƁAԏɖ߂B㉺[vĂ銴ˁv\rulɍE[vĂBSĂƁAIɊ|鎞Ԃߖłv);
#text(1,face=+evfch,uŏ̃y[WÕy[W֍sƂ鎖ŁAŌ̃y[WɔԎłBtɍŌ̃y[W̎֍sƂƁAŏ̃y[W֖߂BƉlɃ[vĂv);

#fc(yj,apr,==,1); if(nowres);
#text(1,face=+evfch,uoX[ɗĂ鉽H@ȂAip[Bւ̉킩l̎ÁA񂾐l̈Ԃ߂܂łĂ邵AƂĂĂBƂȂԂߕ鎖̂ʂɏǁcv);
#BłAȂgǔɂȂ͂ĂȂ݂
#B̕ӂ͂ϐlԂƂ͈Ⴄ̂ȂcH
#ƁAƃAz̎qۂ
#endif;


<prs_hairanai>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uip[̎pɂ͈ނȂccv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,uAGLĂˁIH@ł^NVIɂ̓Pm̗vf͌ȂȂv); end; endif;
#B̐l΂ĂĂ
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a4-ert); if(nowres); text(1,face=+evfch,u[AsvcƖGȂcB̂ǂɃPm̗vf񂾂낤cH@zwǐgɕtĂȂӂɖ쐶̂ȁHv); end; endif;
fc(*actor,pic,>=,yj-a5); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,u[AsvcƖGȂcB̂ǂɃPm̗vf񂾂낤cH@zSgɕtĂȂӂɖ쐶̂ȁHv); end; endif;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uAGĂˁIHv); end; endif;
fc(*actor,pic,==,coral); if(nowres); text(1,face=+evfch,u̎pAǂttĊĂƖG邩v); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂĂA̒ɓȂȂĎ͖SĂˁv); end; endif;

text(1,face=+evfch,u^NV̂悤ɓĺAȂǂ̒ɂ͓Ȃ悤ɂȂĂBʘHꍇ͓ɁAvIɎזɂȂ鎖邩ˁBזȎɂ́AΏǂĂv);
#}bv̋Q[ł
#text(1,face=+evfch,û݂̌ʂ͊SɃ_Bł̃Q[ɂ́A_ōssȂȂǂ̏dvȕωN悤ȗvf͖SĂˁv);
#text(1,face=+evfch,u_vfāAɃ_vfƂ킩ȂƉ^ł͐΂ɔłȂȂĂ܂A삷ꍇ͋CtĂˁv);


<prs_kabeura>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uip[̎p͖ڂɈȂcv); end; endif;
fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,uڂ̓łɂȂ肻Ȏpˁv); end; endif;
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uڂ̖ғłɂȂ肻Ȏpˁv); end; endif;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uڂۗ̕{ɂȂ肻ȃLmCˁv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂ񂾂ˁH@x̏ꍇApςĂĂςȂlǁAO݂v); end; endif;

text(1,face=+evfch,uKiǂ̉AɉBĂČh邩CtĂˁB}bvꍇ́Aǂ̉AɉB@\͎זɂȂՂˁv);


<prs_wndsize>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uip[̎pȂāA|A߂Ăcv); end; endif;
fc(*actor,pic,==,shikyuu); if(nowres); text(1,face=+evfch,uFĕ|ċȂ񂾂ǁA͈̔ĊO|ȂȂcB̂̒mȂpς|ǁv); end; endif;
fc(*actor,pic,==,maneki); if(nowres); text(1,face=+evfch,uFĕ|ċȂ񂾂ǁA̔̓fIɂ͖т̐FĎɂȂ邩AFĂ̂Ƃ͈ĂˁBl`Ă鎞_ŕ|ǁv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c3); or; fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,face=+evfch,uF߂Ăƕ|ȂcBHIȂ̂AzĂ܂v); end; endif;
#̃Q[256FɔĂ邹Ő^ƂˁB߂ăfBUOgĎvˁB
#΁AF̐l|ČĂlAxɂȂcH
#BłHɂĂ͂Ȃ񂩂ނ肵ĂˁB͂ŁAȂ񂾂Sꂻŕ|
#BΐF|ČĂlAɂȂcH
#ȂƂAʂ悤Ȕ߂Ăƕ|ȂcBłA̕|ǂCȂc
#yLh悤ȔłȂAʂ悤ȔȂA
#ȂƂAʂ悤Ȕ߂āAIoP݂łƕ|ȂcBłA̕|ǂCȂc
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uFĕ|ċȂ͂Ȃ̂ɁAĂ܂āAǂɂȂĂ܂Bŕ|Ȃcv); end; endif;
#ccAȂ񂩂YČĂ܂B͕|cBłA{Ă݂Cc
#A|pcB|ĂǂɂȂĂ܂BłAȂ񂩃NZɂȂ肻cBɏoėȂȂc
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uȃLmCr[ꂽAr[ɏĂOɏ΂ł܂B|Ȃcv); end; endif;
fc(*actor,pic,==,dhmo); if(nowres); text(1,face=+evfch,u̎pAO򕨂ۂɁAm炸Ċŕ|ˁv); end; endif;
fc(*actor,pic,==,coral); if(nowres); text(1,face=+evfch,u̎pAȂ񂩏Ŵۂĕ|Hv); end; endif;
fc(*actor,pic,==,ikenaitsuki); or; fc(*actor,pic,==,ikenai2); if(nowres); text(1,face=+evfch,u̎pAieBbNĊĕ|Ȃcv); end; endif;
fc(*actor,pic,==,ichimaz); if(nowres); text(1,face=+evfch,uF̐l`Ăcc܂Ƀz[ˁccv); end; endif;
#ΐF|ČĂlAɂȂcH
fc(*actor,pic,>=,kokeshi); and; fc(*actor,pic,<=,buzzou); if(nowres); text(1,face=+evfch,ul`ȂāA|Ȃcv); end; endif;
fc(*actor,pic,==,demond); or; fc(*actor,pic,==,rkdns); or; fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,uHוȂāA|Ȃcv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂȂāAȂ񂩕|ˁv); end; endif;
#subevent(hengehanyou,);

text(1,face=+evfch,uʂ߂ƊAEChEg傷ƈꉞ͑傫Ȃ炵BłA܂Yɂ͊g傳ȂȂƂv\ruɖ߂ꍇ́Aw%ct2%sysm[*config].nmic%cdx́w%ct2%sysm[*cnf_defwnd].nmic%cdxI邩AweUxL[ƌɖ߂悤BxIƁA1.5{̃TCYQ{̃TCỸTCYƐ؂ւ悤v\ruftHg̃TCY640~480sNZȂ񂾂ǁA2000`2004N炢̍̃tXN[Q[̕WIȉʉ𑜓x݂Bꂪł͂Ȃɏ񂾂A͕ς̂ˁv);
#text(1,face=+evfch,uQ[ʂ߂邩ȂǁAQ[̂̃EChEg傷Ƒ傫Ȃ݂B܂Yɂ͊g傳ȂȂǂˁcv\ruɖ߂ꍇ́Aw%sysm[*config].nmicx́wEChETCYɖ߂xIƌɖ߂悤v\ruftHg̃TCY640~480sNZȂ񂾂ǁA2000`2004N炢̍̃tXN[Q[̕WIȉʉ𑜓x݂Bꂪł͂Ȃɏ񂾂A͕ς̂ˁv);
#܂Yɂ͊g傳ȂǂˁcB

#fc(yj,apr,==,1); if(nowres);
#text(1,face=+evfch,uCɗĂ鉽H@FX|ˁBiD╵͋C܂|Aʃip[̋Ȃ̂|A|炢D̂܂|BłAƂĂcB̑唼͗LQ炵ǁAPĂ݂CĂ܂v);
#text(1,face=+evfch,uɂĂACɗĂ鉽AȂcBiDƕ͋C͂Ȃ񂾂|ǁADĂ܂œVg݂Bŏʃip[̋vƁAGƂAȂ񂩃]N]NȂcB̑唼͗LQ炵ǁAPĂ݂CĂ܂v);
#Bł݂ʂ̈ӖŏPĂꂽ
#endif;


<prs_alone>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,u̎p̓cc߂ƎvȂcv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c3); or; fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,face=+evfch,uffĊ̎pˁBlIɂ͂ƂAccĊ~Ȃv); end; endif;
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uffĊ̎pˁBłAȂňCĂ܂ccv); end; endif;
fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,u[Ċ̎pˁv); end; endif;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,unCeNĊ̎pˁv); end; endif;
fc(*actor,pic,==,coral); if(nowres); text(1,face=+evfch,uċA֐Ċ̎pˁv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂ񂾂ˁH@%it[*henge]̉ʂ́wΏہxďwԑSxɂƁAp[eBɉĂȂԂ̎p܂Ƃ߂ĕς߂ł݂ˁv); end; endif;

text(1,face=+evfch,uPe̐ԂŒԂOłBłƂ藷TƂ͖݂ACɂKv͖BƂŗƁAႦoTl̎ƔׂĂQ{Amɂ%rs%rc[g%reT{ɂ͂Ȃ݂ǁAʂɂTlŗǂƎvv);
#text(1,face=+evfch,uƂŗƁAႦoTl̎ƔׂĂQ{iT{jɂȂ݂BłAʂɂTlŗǂƎvBƂ藷T݂v);
#text(1,face=+evfch,uƂŗƁAႦoTl̎ƔׂĂQ{iT{jɂȂ݂ǁAʂɂTlŗǂƎvv);
#text(1,face=+evfch,uPe̐ԂŒԂOł邯ǁATƂ͖畁ʂɂTlŗǂƎvBƂŗƈꉞAႦoTl̎ƔׂĂQ{iT{jɂ͂Ȃ݂v);
#text(1,face=+evfch,u{ŒԂOł邯ǁATƂ͖畁ʂɂTlŗǂƎvBƂŗƈꉞAႦoTl̎ƔׂĂQ{iT{jɂ͂Ȃ݂v);
#text(1,face=+evfch,uƂŗƈꉞAႦoTl̎ƔׂĂQ{iT{jɂ͂Ȃ邯ǁAʂɂTlŗǂƎvBƂ藷T݂v);


<prs_playtime>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uЂI@[II@IH@UIHv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςACeȂāAʂɏo卬ˁcB~C邯ǁA%pty[e]ɈCǂˁv); end; endif;
#subevent(hengehanyou,);

text(1,face=+evfch,uj[ʂ́w%ct2%sysm[*playtime]%cdxẮACɂȂ邩ȂǁA̕Kv͑SBZԂŃNAƓʂȎNĎ͈݂ؖv\rułAoĂԂȂǂJEgĂāA%sysm[*playtime]ςȎɂȂ̂͂ƋCˁHH@ꍇ́w%ct2eR%cdxƃ|[YԂɂȂāA%sysm[*playtime]̐i݂~Bp\R̐ݒɂẮw%ct2e%cdxȂ牟Kv邩ˁv\ruɂAEChEANeBuɂA܂AႦΑ̃AvP[ṼEChENbN鎖ł|[YԂɂł悤ɂȂĂB͖^Lŝqof\tgƓdlˁv\ruXɂ́AwePOxÃACRNbNĂ|[Y݂ȏԂɂȂ邩ȂǁA͂̃\tg̎dlȂāAWindows̎dl݂v\ru܂A%ct2|[Y@\Q[łAePO𗘗p΃|[YԂɏo鎖%cdBANVvf̂Q[Ń|[YłȂ̂͂ɍ邩AoĂđ͖Ǝvv);
#text(1,face=+evfch,uj[ʂ́w%ct2%sysm[*playtime]%cdxẮACɂȂ邩ȂǁA̕Kv͑SBZԂŃNAƓʂȎNĎ͈݂ؖv\rułAoĂԂȂǂJEgĂāA%sysm[*playtime]ςȎɂȂ̂͂ƋCˁHH@ꍇ́w%ct2eR%cdxƃ|[YԂɂȂāA%sysm[*playtime]̐i݂~Bm[gp\Ȑꍇ͂Aw%ct2e%cdxȂ牟Kv邩ˁv\ruɂAEChEANeBuɂA܂AႦΑ̃AvP[ṼEChENbN鎖ł|[YԂɂł悤ɂȂĂB͖^Lŝqof\tgƓdlˁv\ruXɂ́AwePOxÃACRNbNĂ|[Y݂ȏԂɂȂ邩ȂǁA͂̃\tg̎dlȂāAWindows̎dl݂v\ru܂A%ct2|[Y@\Q[łAePO𗘗p΃|[YԂɏo鎖%cdBANVvf̂Q[Ń|[YłȂ̂͂ɍ邩AoĂđ͖Ǝvv);
#text(1,face=+evfch,uj[ʂ́w%ct2vC%cdxẮACɂȂ邩ȂǁAZԃNATƂSCɂKvv\rułAoĂԂȂǂJEgĂāAvCԂςȎɂȂ̂͂ƋCˁHH@ꍇ́w%ct2eR%cdxƃ|[YԂɂȂāAvCԂ̐i݂~v\ruɂAEChEANeBuɂA܂AႦΑ̃AvP[ṼEChENbN鎖ł|[YԂɂłB͖^Lŝqof\tgƓdlˁv\ruwePOxĂ|[Y݂ȏԂɂȂ邩ȂǁA͂̃\tg̎dlȂāAWindows̎dl݂B%ct2|[Y@\Q[łAePOg΃|[YԂɏo鎖%cdBANVvf̂Q[Ń|[YłȂ̂͂ɍ邩AoĂđ͖Ǝvv);


<yj-a>
evflag(*inmap:yjitem,==,0); if(nowres);
text(1,(face=+evfch:dmg,swait=-1),uA߂ȂŁI@킽AڍוsȂ́v);
#item(check:eq,XP[gC,1); and; item(check:eq,r[T,1); and; item(check:eq,XP,1); and; item(check:eq,XL[,1); if(nowres);
#item(check:eq,XP[gC,1); and; item(check:eq,r[T,1); and; item(check:eq,XP,1); and; item(check:eq,XL[,1); and; item(check:eq,,1); and; item(check:eq,@r,1); and; item(check:eq,Ђ傤,1); and; item(check:eq,ToCU[,1); and; item(check:eq,,1); and; item(check:eq,},1); or; 
item(check:eq,XL[,1); or; item(check:eq,̌,1); if(nowres);
#item(get,Ԗr,4); or; item(get,\r,4); if(nowres); evflag(*inmap:yjitem,=,1); text(0,w%it[*Ԗr].nmicxƁw%it[*\r].nmicxSI); end; endif;
#text(0,w%it[*Ԗr].nmicxƁw%it[*\r].nmicx͂ȏ͎ĂȂB);
item(get,Ԗr,4); or; item(get,񕜏Ԗr,4); if(nowres); evflag(*inmap:yjitem,=,1); text(0,w%it[*Ԗr].nmicxƁw%it[*񕜏Ԗr].nmicxSI); end; endif;
text(0,w%it[*Ԗr].nmicxƁw%it[*񕜏Ԗr].nmicx͂ȏ͎ĂȂB);
else;
item(check:eq,XP[gC,1); and; item(check:eq,r[T,1); and; item(check:eq,XP,1); if(nowres);
item(get,Ԗr,4); if(nowres); evflag(*inmap:yjitem,=,1); text(0,w%it[*Ԗr].nmicxSI); end; endif;
else;
item(get,Ԗr,1); if(nowres); evflag(*inmap:yjitem,=,1); text(0,w%it[*Ԗr].nmicxI); end; endif;
endif;
text(0,w%it[*Ԗr].nmicx͂ȏ͎ĂȂB);
endif;

#item(check:eq,XP[gC,1); and; item(check:eq,r[T,1); and; item(check:eq,XP,1); and; item(check:eq,XL[,1); and; item(check:eq,,1); and; item(check:eq,@r,1); and; item(check:eq,Ђ傤,1); and; item(check:eq,ToCU[,1); and; item(check:eq,,1); and; item(check:eq,},1); if(nowres);
#item(get,\r,1); if(nowres); text(0,w\rxI); end; endif;
#text(0,\r͂ȏ͎ĂȂB);
#else;
#text(0,Ԗr͂ȏ͎ĂȂB);
#endif;

subevent(exism,); if(nowres); text(1,(face=+evfch:crm0,swait=-1),uEEE傤ȂˁEEEv); subevent(yjsv,); endif;
evflag(*inmap:yjitem,=,1);

else;
#fc(*actor,pic,==,yj-a1); if(nowres); text(1,(face=+evfch:a2,swait=-1),uAŵPx̎pɂȂĂ̂ˁHv); end; endif;
fc(*actor,pic,==,yj-a1); or; fc(*actor,pic,==,yj-a2); or; fc(*actor,pic,==,yj-a3); if(nowres); text(1,(face=+evfch,swait=-1),uAH@ȁ`Ă˂v); end; endif;
#΁A킽ĂƁAďōł̂Ă炵
#fc(*actor,pic,==,yj-a3); if(nowres); text(1,(face=+evfch,swait=-1),uAŵRx̎pɂȂĂ̂ˁHv); end; endif;
#ƂŁA킽̏oė鏊āA̕ƑO̕ƂłԋCႤ̂ˁBhˁc
#fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a4-ert); if(nowres); text(1,(face=+evfch:prh,swait=-1),u̎p͂āA`́ŵSxcH@ႤȂĐcI@ɂĂApˁI@킽͂܂܂ˁcv); end; endif;
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a4-ert); if(nowres); text(1,(face=+evfch:prh,swait=-1),uŵSxĖ{ɋ̂ˁIH@ႤȂĐcI@ɂĂApˁI@킽͂܂܂ˁcv); end; endif;
fc(*actor,pic,>=,yj-a5); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,(face=+evfch:prh,swait=-1),u܂ŵTxȂāAƂcv); end; endif;
fc(*actor,pic,==,yj-b1); or; fc(*actor,pic,==,yj-b2); or; fc(*actor,pic,==,yj-b3); if(nowres); text(1,(face=+evfch,swait=-1),uAsN̎q̎pɂȂĂ̂ˁH@΃sN̎q⎇̎qɂAȂq邻B킽A̂Ȃv); end; endif;
#sN̎qāAƂĂu[ˁc
fc(*actor,pic,==,yj-c1); or; fc(*actor,pic,==,yj-c2); or; fc(*actor,pic,==,yj-c3); if(nowres); text(1,(face=+evfch,swait=-1),uA̎q̎pɂȂĂ̂ˁH@΃sN̎q⎇̎qɂAȂq邻B킽A̂Ȃv); end; endif;
#̎qāAȂ񂾂c
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,(face=+evfch,swait=-1),u[AXeLȃLmCI@pςĂƂ킩ĂĂAƃhLhLႤcv); end; endif;
fc(*actor,pic,==,coral); if(nowres); text(1,(face=+evfch,swait=-1),uƂĂ}`bNȎpˁcv); end; endif;
fc(*actor,pic,==,metaele); or; fc(*actor,pic,==,hollele); if(nowres); text(1,(face=+evfch,swait=-1),u΂݂YȎpˁcv); end; endif;
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,(face=+evfch,swait=-1),uȂ񂾂|pˁcv); end; endif;
fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,(face=+evfch,swait=-1),uȂ񂾂A킽Ɣ̂pˁcH@łAɊ֌W͖݂ˁB킵čႤ˂`Hv); end; endif;
fc(*actor,pic,==,grpeng); or; fc(*actor,pic,==,maru); or; fc(*actor,pic,==,maneki); if(nowres); text(1,(face=+evfch,swait=-1),u[A킢Iv); end; endif;
fc(*actor,pic,==,mame); if(nowres); text(1,(face=+evfch,swait=-1),uA}񂳂̎pɂȂĂ̂ˁHv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,(face=+evfch,swait=-1),uApςĂ̂ˁHv); end; endif;

text(1,(face=+evfch,swait=-1),u畴킵ȂǁA킽ɂ͓ɏdvȗvfĂ͖݂̂H@̂Ղ[ƂƂڎwĂꍇ́ATĂ݂Ăˁv);
#uƁA킽ĂƁAďōł̂Ă炵BłɈӖ͖݂v
#킽̏oė鏊āA̕ƑO̕ƂłԋCႤ̂ˁBhˁc
#畴킵ȂǁA킽͂̃ACez݂ȊŁAɓʂȗvfĂ͖݂̂H
#킽Ɋ֌Wvf̂Ղ肢ƂƂ֌W݂
#CɂȂ鎖A𓖂Ă݂Ă
#Ȁł݂ǁA킽̏oė鏊āA̕ƑO̕ƂłԋCႤ̂ˁBhˁc
#ƁA킵Ȃǁcc킽ɂ͓ɓʂȗvfĂ͖݂̂
#킵Ȃǁcc킽ɂ͓ɓʂȗvfĂ͖݂̂BACe~ȂA܂Ă
#OiK炢ɕĂ݂B
#畴킵ȂǁA킽͍UƂ͖֌W݂B

endif;


#tOZbg
<resetflag>
text(1,face=uam,Q[̐is̃Zbgł悤B\n%ct3iʂ⏊iȂǂ̓Zbg܂B%cd\n%ct3qgɂāAsƂ̂ꏊsĂȂɂȂ肷̂łӂB%cd);
#evflagsw(ex_resetflag,==,0); if(nowres); evflagsw(ex_resetflag,=,1); endif;
#text(1,face=uam,ł̓Q[̐is̃Zbgł܂B\nZbg܂H);
select2(reset,all);
select2(+isn(id=1,com=ăj[Q[IȏԂɂȂ܂B));
#̏ꍇ͉nZbgĂ̂߂łB
select2(+n(id=2,com=x\ȂbZ[W≉oĂѕ\܂BZbgĂQ[̐isɂ͈؉e܂B\n%ct3G̑̃ZtɂẮAw%sysm[*config].nmicx́w%sysm[*dspenemsg]xIłB%cd));
#w%it[*\ݒ].nmicx
select2(+[v|Cg(id=3,com=w%it[*Wv].nmicxōsꏊ̃Xgɂ܂B));
select2(+}ӌn(id=4,com=w%it[*ip[].nmicxw%it[*G].nmicxw%it[*jukebox].nmicx̓eZbg܂B));
select2(+(id=5,com=w%it[*ip[].nmicxŌ铢Zbg܂B));
select2(+S(id=0,com=L̑SĂZbg܂B));
select2(+Ȃ(com=Zbg܂B)); select2(/);
select2(*isZbg܂H(cid=));
#x⏊iȂǂ̓Zbg܂B
if(evf(*selected)==1); subevent(@rf_progress,); text(0,isn̂݃Zbg܂B); end; endif;
if(evf(*selected)==2); subevent(@rf_explain,); text(0,n̂݃Zbg܂B); end; endif;
if(evf(*selected)==3); subevent(@rf_warp,); text(0,[v|Cĝ݃Zbg܂B); end; endif;
if(evf(*selected)==4); subevent(@rf_zukan,); text(0,}ӌn̂݃Zbg܂B); end; endif;
if(evf(*selected)==5); subevent(@rf_enedf,); text(0,̂݃Zbg܂B); end; endif;
if(evf(*selected)==0); subevent(@rf_progress,); subevent(@rf_explain,); subevent(@rf_warp,); subevent(@rf_zukan,); text(0,SăZbg܂B); end; endif;
text(0,Zbg܂łB); end;


#isnZbg
<rf_progress>
evflag(progress,=,0);
#evflag(hytrap,=,-1);
#evflag(main,=,0);
#evflag(dspbtrate,=,0b1110010001);
#evflag(dspbtrate,=,0b1001110000000);
#퓬ir֌Ŵ݃NA
evflag(dspbtrate,&=~,0b1111111);
#evflag(dspbtrate,=,evf(*reset:dspbtrate));
member(*l,subflg,&=,12);
member(*la,subflg,&=,12); member(*llԂa,subflg,&=,12); member(*lԌa,subflg,&=,12); member(*ld_a,subflg,&=,12); member(*lcqa,subflg,&=,12); member(*l{bga,subflg,&=,12); member(*l̗da,subflg,&=,12); member(*lKCRca,subflg,&=,12);
member(*lb,subflg,&=,12); member(*llԂb,subflg,&=,12); member(*lԌb,subflg,&=,12); member(*ld_b,subflg,&=,12); member(*lcqb,subflg,&=,12); member(*l{bgb,subflg,&=,12); member(*l̗db,subflg,&=,12); member(*lKCRcb,subflg,&=,12);
member(*l,subflg,|=,1);
member(*la,subflg,|=,1); member(*llԂa,subflg,|=,1); member(*lԌa,subflg,|=,1); member(*ld_a,subflg,|=,1); member(*lcqa,subflg,|=,1); member(*l{bga,subflg,|=,1); member(*l̗da,subflg,|=,1); member(*lKCRca,subflg,|=,1);
fc(*actor,mvrgn,=,(,,,,d));


#nZbg
<rf_explain>
evflag(explain,=,0);
evcombi(ex_enemy,*clear); evcombi(ex_item,*clear);


#[v|CgZbg
<rf_warp>
#evflag(warp1,=,0);
evcombi(warppos,*clear);


#}ӌnZbg
<rf_zukan>
#evflag(enc1,=,0); evflag(enc2,=,0); evflag(enc3,=,0); evflag(enc4,=,0); evflag(enc-gs,=,0); evflag(enc-wt,=,0);
zukan(sysm:*clear);
zukan(member:*clear);
zukan(party:*clear);
zukan(enemy:*clear);
zukan(enegr:*clear);
zukan(item:*clear);
zukan(skill:*clear);
zukan(job:*clear);
zukan(cond:*clear);
zukan(elem:*clear);
zukan(jbtype:*clear);
zukan(eqtype:*clear);
zukan(music:*all,=,title);
zukan(sound:*clear);
zukan(icon:*clear);
zukan(face:*clear);
zukan(fchpic:*clear);
zukan(bchpic:*clear);
zukan(efcpic:*clear);
zukan(picture:*clear);
zukan(cursor:*clear);
zukan(frame:*clear);
zukan(effect:*clear);
zukan(btf:*clear);
zukan(map:*clear);
zukan(act:*clear);
zukan(downefc:*clear);
evflag(enzyj,=,0);
evflag(enzyj2,=,0);
#evflag(cond1,=,0);


#Zbg
<rf_enedf>
enedf(*reset);


#ReBj[^fobO[h
<debugmode>
#evflagsw(debug_vala,==,0); if(nowres); text(1,face=uam,ReBj[p̈Í͂ł悤B); goto(1); endif;
#if(evf(*sw:debug_full)==0);
#evtext(subtx1,=,*ReBj[p̈Í͂ł悤B);
#if(evf(*sw:debug_omak)==1); evtext(subtx1,*=,*%ct3I}P܂ŉς%cd);
#elif(evf(*sw:debug_moon)==1); evtext(subtx1,*=,*%ct3{Xj܂ŉς%cd);
#elif(evf(*sw:debug_vala)==1); evtext(subtx1,*=,*%ct3{ҍU܂ŉς%cd);
#else; evtext(subtx1,*=,*%ct3{Q[̓o[WAbvɂăZ[uf[^gɂȂȂȂ鎖傭傭܂AQ[is鎖œÍœ͂鎖ŁA̕ӂ̌olEACeEis󋵂ĊJł悤ɂȂ܂B%cd);
#endif;
#text(1,face=uam,%str[*subtx1]);

if(evf(*sw:debug_vala)==0);
text(1,face=uam,ReBj[p̈Í͂ł悤B\n%ct3{Q[̓o[WAbvɂăZ[uf[^gɂȂȂȂ鎖傭傭܂AQ[is鎖œÍœ͂鎖ŁA̕ӂ̌olEACeEis󋵂ĊJł悤ɂȂ܂B%cd);
subevent(@inpdbpass,); if(evf(*sw:debug_full)==0); end; endif;
endif;

while;

if(evf(*sw:debug_full)==1); evtext(subtx1,=,*mfobO[hn);
else;
if(evf(*sw:debug_omak)==1); evtext(subtx1,=,*I}P܂ŉς);
elif(evf(*sw:debug_moon)==1); evtext(subtx1,=,*{Xj܂ŉς);
elif(evf(*sw:debug_vala)==1); evtext(subtx1,=,*{ҍU܂ŉς);
endif;
evtext(subtx1,=,*mReBj[n\n%str[*subtx1]);
endif;

select(*%str[*subtx1](cid=,udev=@update_debugmode,dnev=@done_debugmode));
if(evf(*selected)==9); subevent(@inpdbpass,); if(evf(*sw:debug_full)==0); end; endif; next; endif;
if(evf(*selected)==10); evflagsw(debug_vala,=,0); evflagsw(debug_moon,=,0); evflagsw(debug_omak,=,0); evflagsw(debug_full,=,0); text(0,bNV}V^); end; endif;
if(evf(*selected)==44); subevent(slcjob,); select(update); next; endif;
if(evf(*selected)==47); subevent(@slcenegr,); next; endif;
if(evf(*selected)==100); subevent(recover,); fcwait(*actor); next; endif;
wend;

evflagsw(dspyj5img,=,0);


<update_debugmode>
#evflagsw(debug_vala,==,0); or; evflagsw(debug_omak,==,0); if(nowres); select(+fobO[hnm(id=10)); else; select(+fobO[hnm(en=0)); endif;
#evflagsw(debug_full,==,0); if(nowres); select(+ʈÍ(id=10)); else; select(+ʈÍ(en=0,com=ŏʈÍꂽI)); endif;

if(evf(*sw:debug_full)==0);

select(+ʈÍ(id=9,ic=arrow_u));
select(+sēxK(id=40,ic=new));
if(evf(*sw:debug_moon)!=0); select(+󒆕VēxK(id=41,ic=new)); endif;
if(evf(*sw:debug_omak)!=0); select(+I}Pēx(id=42,ic=new)); endif;

else;

#select(+ʈÍ(id=9,ic=arrow_u,en=*evf(*sw:debug_full)==0));
select(+ÍJɖ߂(id=10,ic=arrow_d));
select(+܂Ƃ߂ē(id=11,ic=none));
formem(party); member(select,exp,<,60000); nextmem(exis); select(+ol6܂ő(id=12,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,200000); nextmem(exis); select(+ol20܂ő(id=13,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,600000); nextmem(exis); select(+ol60܂ő(id=14,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,2000000); nextmem(exis); select(+ol200܂ő(id=15,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,6000000); nextmem(exis); select(+ol600܂ő(id=16,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,20000000); nextmem(exis); select(+ol2000܂ő(id=17,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,60000000); nextmem(exis); select(+ol6000܂ő(id=18,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,200000000); nextmem(exis); select(+ol2܂ő(id=19,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,600000000); nextmem(exis); select(+ol6܂ő(id=20,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,2000000000); nextmem(exis); select(+ol20܂ő(id=21,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,9999999999999999); nextmem(exis); select(+ol2000(id=22,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,9999999999999999); nextmem(exis); select(+ol2(id=23,ic=hkz,en=*nowres));
formem(party); member(select,exp,<,9999999999999999); nextmem(exis); select(+ol}bNX(id=24,ic=hkz,en=*nowres));
party(,gold,<,9999999999999999); select(+}bNX(id=30,ic=gold,en=*nowres));
evflag(*64:gdbank,<,9999999999999999); select(+a}bNX(id=31,ic=gold,en=*nowres));
select(+ACeQbg(id=32,ic=bottle));
select(+sK(id=40,ic=new));
select(+󒆕VK(id=41,ic=new));
select(+I}P(id=42,ic=new));
select(+Svf(id=43,ic=new));
select(+]E(id=44,ic=kunshou));
party(,mxcount,<,9); if(nowres); select(+eʂXlɊg(id=45,ic=max)); else; select(+eʂTlɖ߂(id=46,ic=min)); endif;
select(+Cӂ̓GO[vƐ퓬(id=47,ic=sword));
select(+⌇ACeX(id=48,ic=jihanki));

select(+SG{(id=50,ic=book));
select(+SW{(id=51,ic=book));
select(+ZSW{(id=52,ic=book));
select(+ԈُSW{(id=53,ic=book));
select(+ACRSW{(id=54,ic=book));
select(+OSW{(id=55,ic=book));
select(+sOSW{(id=56,ic=book));
select(+퓬OSW{(id=57,ic=book));
select(+ʃOSW{(id=58,ic=book));
select(+sN`SW{(id=59,ic=book));

formem(party); member(select,cutelem,,org,<,3); nextmem(exis); select(+ΑϐƕXϐ𑝂₷(id=60,ic=arrow_u,en=*nowres));
formem(party); member(select,cutelem,,org,>,-3); nextmem(exis); select(+ΑϐƕXϐ炷(id=61,ic=arrow_d,en=*nowres));
select(+ϐZbg(id=62,ic=none));
formem(party); member(select,cutcond,,org,<,3); nextmem(exis); select(+őϐƖბϐ𑝂₷(id=63,ic=arrow_u,en=*nowres));
formem(party); member(select,cutcond,,org,>,-3); nextmem(exis); select(+őϐƖბϐ炷(id=64,ic=arrow_d,en=*nowres));
select(+ԑϐZbg(id=65,ic=none));
glcond(&,(疳,)); if(nowres); evtext(subtx1,=,*nm); else; evtext(subtx1,=,*nee); endif; select(+E𖳌[hF%str[*subtx1](id=66));
select(+񕜂(id=100,ic=recover));
#select(+(ic=close));
#select(+); select(/instant1); select(*(cid=)); evflag(instant1,=,evf(*selected));

endif;


#ReBj[^fobO[hs
<done_debugmode>
#if(evf(*selected)==0); evflagsw(aks,=,1); text(1,,ȓeւ܂BƑŃvCɂ͂C܂邩܂iȒPɂ͌ȂƎv܂jB); goto(10); endif;
#if(evf(*selected)==1); evflagsw(aks,=,0); text(1,,ȓe𕕈󂵂܂BƑłSăvC܂B); goto(10); endif;
#if(evf(*selected)==9); subevent(@inpdbpass,); select(update); end; endif;
if(evf(*selected)==9); select(close); end; endif;
if(evf(*selected)==10); select(close); end; endif;
if(evf(*selected)==11); evtext(subtx1,=,*); subevent(@kaihou_full,); sound(warp); subevent(recover2,); text(4,mxh=0,%str[*subtx1]); select(update); end; endif;
if(evf(*selected)==12); formem(party); member(select,exp,max=,60000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==13); formem(party); member(select,exp,max=,200000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==14); formem(party); member(select,exp,max=,600000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==15); formem(party); member(select,exp,max=,2000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==16); formem(party); member(select,exp,max=,6000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==17); formem(party); member(select,exp,max=,20000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==18); formem(party); member(select,exp,max=,60000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==19); formem(party); member(select,exp,max=,200000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==20); formem(party); member(select,exp,max=,600000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==21); formem(party); member(select,exp,max=,2000000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==22); formem(party); member(select,exp,+=,20000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==23); formem(party); member(select,exp,+=,200000000, 0,0); nextmem(); sound(warp); select(update); text(0,olI); end; endif;
if(evf(*selected)==24); formem(party); member(select,exp,+=,9999999999999999, 0,0); nextmem(); sound(warp); select(update); text(0,ol}bNXI); end; endif;
if(evf(*selected)==30); party(,gold,+=,9999999999999999); sound(warp); select(update); text(0,}bNXI); end; endif;
if(evf(*selected)==31); evflag(*64:gdbank,=,9999999999999999); sound(warp); select(update); text(0,a}bNXI); end; endif;
if(evf(*selected)==32); subevent(@kaihou_vala_it,); subevent(@kaihou_moon_it,); subevent(@kaihou_omak_it,); subevent(@kaihou_full_it,); sound(warp); select(update); text(0,ACeQbgI); end; endif;
if(evf(*selected)==40); subevent(@kaihou_vala_fl,); sound(warp); select(update); text(0,sKI); end; endif;
if(evf(*selected)==41); subevent(@kaihou_moon_fl,); sound(warp); select(update); text(0,󒆕VKI); end; endif;
if(evf(*selected)==42); subevent(@kaihou_omak_fl,); sound(warp); select(update); text(0,I}PI); end; endif;
if(evf(*selected)==43); subevent(@kaihou_full_fl,); sound(warp); select(update); text(0,SvfI); end; endif;

#]E
if(evf(*selected)==44); select(close); end; endif;
if(evf(*selected)==45); subevent(expandparty,); sound(warp); select(update); text(1,face=uam,eʂXlɑI); end; endif;
if(evf(*selected)==46); party(,resetpos); select(update); text(1,face=uam,eʂTlɖ߂B); end; endif;
#Cӂ̓GƂ̐퓬
if(evf(*selected)==47); select(close); end; endif;
if(evf(*selected)==48); buy(shop_sb,); end; endif;

if(evf(*selected)==50); subevent(naperzukan(1),); end; endif;
if(evf(*selected)==51); zukan(item,SW,mode=dspall); end; endif;
if(evf(*selected)==52); zukan(skill,ZSW,mode=dspall); end; endif;
if(evf(*selected)==53); zukan(cond,ԈُSW,mode=dspall); end; endif;
if(evf(*selected)==54); zukan(icon,ACRSW,(mode=dspall,dspdetail=0)); end; endif;
if(evf(*selected)==55); zukan(face,OSW,mode=dspall); end; endif;
if(evf(*selected)==56); zukan(fchpic,sOSW,mode=dspall); end; endif;
if(evf(*selected)==57); zukan(bchpic,퓬OSW,mode=dspall); end; endif;
if(evf(*selected)==58); zukan(efcpic,ʃOSW,mode=dspall); end; endif;
if(evf(*selected)==59); zukan(picture,sN`SW,(mode=slcable|dspall,dnev=done_picturelist)); end; endif;

if(evf(*selected)==60); formem(party); member(select,cutelem,,org,<,3); if(nowres); member(select,cutelem,,org,+=,(,X)); endif; nextmem(); sound(warp); select(update); text(0,ϐI); end; endif;
if(evf(*selected)==61); formem(party); member(select,cutelem,,org,>,-3); if(nowres); member(select,cutelem,,org,+=,(:-1,X:-1)); endif; nextmem(); select(update); text(0,ϐ); end; endif;
if(evf(*selected)==62); formem(party); member(select,cutelem,,reset); nextmem(); select(update); text(0,ϐZbg); end; endif;
if(evf(*selected)==63); formem(party); member(select,cutcond,,org,<,3); if(nowres); member(select,cutcond,,org,+=,(,)); endif; nextmem(); sound(warp); select(update); text(0,ԑϐI); end; endif;
if(evf(*selected)==64); formem(party); member(select,cutcond,,org,>,-3); if(nowres); member(select,cutcond,,org,+=,(:-1,:-1)); endif; nextmem(); select(update); text(0,ԑϐ); end; endif;
if(evf(*selected)==65); formem(party); member(select,cutcond,,reset); nextmem(); select(update); text(0,ԑϐZbg); end; endif;
if(evf(*selected)==66); glcond(&,(疳,)); if(nowres); glcond(-=,(疳,)); else; glcond(|=,(疳,)); endif; select(update); end; endif;

#
if(evf(*selected)==100); select(close); end; endif;


#pX[h
<inpdbpass>
#input(pX[h@@jENVe`,,1,);
#evflagsw(debug_full,==,1); if(nowres); text(0,ŏʂ̈ÍĂB); next; endif;
evtext(,input,(title=Íׂ͂I,initpage=1)); if(nowres);
evtext(,==,*ɂႢ); if(nowres); evflagsw(debug_vala,=,1); evflagsw(debug_moon,=,1); evflagsw(debug_omak,=,1); evflagsw(debug_full,=,1); goto(10); endif;
evtext(,==,*ARjX^[); if(nowres); evtext(subtx1,=,*); subevent(@kaihou_omak,); if(nowres); goto(11); endif; goto(12); endif;
evtext(,==,*ڂ񂨂ǂ);   if(nowres); evtext(subtx1,=,*); subevent(@kaihou_moon,); if(nowres); goto(11); endif; goto(12); endif;
evtext(,==,*i|^);   if(nowres); evtext(subtx1,=,*); subevent(@kaihou_vala,); if(nowres); goto(11); endif; goto(12); endif;
#text(0,pX[h@K@`Exn); end;
text(0,͈ႤI);
endif;
end;
#evflagsw(debug_vala,==,1); if(nowres); next; endif; end;
label(10); text(0,JCWV}^); end;
label(11); sound(warp); subevent(recover2,); text(4,,%str[*subtx1]); text(1,,͈xȂ̂ŁAACe̔p͂vIɁI); end;
label(12); text(0,̃pX[h͉ς݂I); end;


#{҃NA܂
<kaihou_vala>
if(evf(*sw:debug_vala)!=0 && evf(*sw:debug_full)==0); false; end; endif;
#evflagsw(debug_vala,=,1);
subevent(@kaihou_vala_fl,); evtext(subtx1,*=,*%o[*new]sKI);
member(*l,job,E,==,ilm); if(nowres); member(*l,job,E,=,ilr); evtext(subtx1,*=,*%o[*kunshou]%mem[*l]%job[*ilr]ɐiI); endif;
formem(all); member(select,exp,+=,2000000, 0,0); nextmem(); evtext(subtx1,*=,*%o[*hkz]So[2000000̌oς񂾁I);
party(,gold,+=,2000000); evtext(subtx1,*=,*%o[*gold]2000000~ɓꂽI);
subevent(@kaihou_vala_it,); evtext(subtx1,*=,*%o[*bottle]{҃NA܂ł̊eACe肵I);
true;


<kaihou_vala_fl>
subevent(valapriv,);
evcombi(warppos,|=,warppos,(hokora,kofun,chyaku,chijoue,pyramid,hokora2,cv1_w,cv1_e,hokora3,knk,knw_w,knw_e,cv1_n,cassle));
evflagsw(pr_dsphitr,=,1); evflagsw(dsphitr,=,1); evflagsw(dspescr,=,1); evflagsw(pr_vehicle,=,1); evflagsw(pr_ship,=,1);


<kaihou_vala_it>
item(get,cavkey,1); item(get,henge,1); item(get,a,10); item(get,ž,1); item(get,̌,1); item(get,˂̏,1); item(get,̏,1);
item(get,jukebox,1); item(get,album,1); 
item(check:aleq|alpt|bank,ip[,1); unif(nowres); item(get,ip[,1); endif;
item(check:aleq|alpt|bank,G,1); unif(nowres); item(get,G,1); endif;
#item(check:aleq|alpt|bank,jukebox,1); unif(nowres); item(get,jukebox,1); endif;
item(check:aleq|alpt|bank,̌,1); or; item(check:aleq|alpt|bank,,1); unif(nowres); item(get,̌,1); endif;
item(check:aleq|alpt|bank,̏,1); or; item(check:aleq|alpt|bank,,1); unif(nowres); item(get,̏,1); endif;


#{Xj܂
<kaihou_moon>
if(evf(*sw:debug_moon)!=0 && evf(*sw:debug_full)==0); false; end; endif;
subevent(@kaihou_vala,);
#evflagsw(debug_moon,=,1);
subevent(@kaihou_moon_fl,); evtext(subtx1,*=,*%o[*new]󒆕VKI);
formem(all); member(select,exp,+=,20000000, 0,0); nextmem(); evtext(subtx1,*=,*%o[*hkz]So[20000000̌oς񂾁I);
party(,gold,+=,20000000); evtext(subtx1,*=,*%o[*gold]20000000~ɓꂽI);
subevent(@kaihou_moon_it,); evtext(subtx1,*=,*%o[*bottle]{Xj܂ł̊eACe肵I);
true;


<kaihou_moon_fl>
subevent(@kaihou_vala_fl,);
subevent(moonpriv,);
evcombi(warppos,|=,warppos,(forest1,forest2,tower,shinden,haikyo,mount,scv_ne,scv_sw,stc,yashiro,hyper));
evflagsw(pr_dspcdr,=,1); evflagsw(pr_forest1,=,1); evflagsw(pr_forest2,=,1); evflagsw(dspkeepr,=,1); evflagsw(dspcondr,=,1); evflagsw(pr_ysridou,=,1);


<kaihou_moon_it>
item(get,񕜂̏,1); item(get,toolset,1);
item(check:aleq|alpt|bank,̌,1); or; item(check:aleq|alpt|bank,,1); unif(nowres); item(get,̌,1); endif;
item(check:aleq|alpt|bank,̏,1); or; item(check:aleq|alpt|bank,,1); unif(nowres); item(get,̏,1); endif;
item(change:aleq|alpt|bank,̌,,1); item(change:aleq|alpt|bank,̏,,1);
item(check:aleq|alpt|bank,̈,1); or; item(check:aleq|alpt|bank,,1); unif(nowres); item(get,̈,1); endif;


#I}PB܂
<kaihou_omak>
if(evf(*sw:debug_omak)!=0 && evf(*sw:debug_full)==0); false; end; endif;
subevent(@kaihou_moon,);
#evflagsw(debug_omak,=,1);
subevent(@kaihou_omak_fl,); evtext(subtx1,*=,*%o[*new]I}PI);
member(*l,job,E,==,ilm); or; member(*l,job,E,==,ilr); if(nowres); member(*l,job,E,=,ilg); evtext(subtx1,*=,*%o[*kunshou]%mem[*l]%job[*ilg]ɐiI); endif;
formem(all); member(select,exp,+=,200000000, 0,0); nextmem(); evtext(subtx1,*=,*%o[*hkz]So[200000000̌oς񂾁I);
party(,gold,+=,200000000); evtext(subtx1,*=,*%o[*gold]200000000~ɓꂽI);
subevent(@kaihou_omak_it,); evtext(subtx1,*=,*%o[*bottle]I}PB܂ł̊eACe肵I);
true;


<kaihou_omak_fl>
subevent(@kaihou_moon_fl,);
subevent(moon2priv,);
evcombi(warppos,|=,warppos,(kazan,hyrest,omake));
evflagsw(pr_dspcrtr,=,1); evflagsw(pr_dfvala2,=,1); evflagsw(pr_deckbr,=,1); evflagsw(dspcrtr,=,1); evflagsw(dspblkr,=,1); evflagsw(dspmbdmg,=,1);


<kaihou_omak_it>
item(get,ɒ,1); item(get,ɒF,1); item(get,caskey,1); item(get,[Č,1); item(get,kachink,1); item(get,z,1); item(get,,1); item(get,Wv䁇,1); item(get,alerm-inf,1); item(get,mchecker,1); item(get,sŔe,1); item(get,ԓJ,10); item(get,DJ,10); item(get,@J,10); item(get,ʍs,10); item(get,s,10);
item(check:aleq|alpt|bank,̈,1); or; item(check:aleq|alpt|bank,,1); unif(nowres); item(get,̈,1); endif;
item(change:aleq|alpt|bank,̈,,1);


#Svf
<kaihou_full>
subevent(@kaihou_omak,);
subevent(@kaihou_full_fl,); evtext(subtx1,*=,*%o[*new]SvfI);
formem(all); member(select,exp,+=,2000000000, 0,0); nextmem(); evtext(subtx1,*=,*%o[*hkz]So[2000000000̌oς񂾁I);
party(,gold,+=,2000000000); evtext(subtx1,*=,*%o[*gold]2000000000~ɓꂽI);
subevent(@kaihou_full_it,); evtext(subtx1,*=,*%o[*bottle]SvfB܂ł̊eACe肵I);
true;


<kaihou_full_fl>
subevent(@kaihou_omak_fl,);
evcombi(warppos,|=,warppos,(hideshop,hyhanare));
evflagsw(pr_plane,=,1); evflagsw(pr_bnyj-a4,=,1); evflagsw(pr_bnmoon2,=,1);
subevent(enc_yj,); subevent(enzyj2_on,);


<kaihou_full_it>
item(get,fbLuV,1); item(get,ꎫT,1); item(get,aT,1); item(get,},1); item(get,SȎT,1); item(get,Xg,1); item(get,e̊O,10); item(get,eishaki,10); item(get,colcell,10); item(get,gchyaku,10); item(get,chyakupp,10); item(get,gchyakupp,10); item(get,u[X^[,10); item(get,I,10); item(get,Ί,10); item(get,񂴂,10); item(get,}W,10); item(get,,10); item(get,kdc,10); item(get,卪,10); item(get,cXX,10); item(get,,10); item(get,XP[gC,10); item(get,r[T,10); item(get,XP,10); item(get,XL[,10); item(get,,10); item(get,@r,10); item(get,Ђ傤,10); item(get,ToCU[,10); item(get,,10); item(get,},10); item(get,,1); item(get,͂ɂ,1); item(get,sl`,1); item(get,_},1); item(get,L,1); item(get,,1); item(check:aleq|alpt|bank,lȐ,1); unif(nowres); item(get,lȐ,1); endif; item(get,sakuteki,1); item(get,sakuteki-pl,1); item(get,slcalerm,1); item(get,slcalerm-pl,1); item(get,mcheckerex,1); item(get,d,10); item(get,̌,10); item(get,,10); item(get,gU@,10); item(get,@,10); item(get,hˍU,10); item(get,U˖h,10); item(get,,10); item(get,ΑŐ,10); item(get,{@,1); item(get,@,1); item(get,s^bv,10); item(get,I[gXLi[,1); item(get,̏,1); item(get,Fʂ̏,1); item(get,s̏,1); item(get,͂̏,1); item(get,̏,1); item(get,Ԗr,10); item(get,r,10); item(get,GNT[r,10); item(get,sŔeQ,1); item(get,sŔeR,1); item(get,ÌŒe,10); item(get,osb,10); item(get,dub,10); item(get,e,10); item(get,eQ,10); item(get,Su,10);
#item(get,Rz,1); item(get,①,1); item(get,z[X,1); item(get,퓬ir,1); item(get,ړx,1); 


#Cӂ̓GO[vƐ퓬
<slcenegr>
evarg(eneg);
#while; evflag(*selected,=,evf(selectedenegr)); zukan(enegr,GO[vI,(mode=slcable|dspall,initid=*selected)); if(nowres);
while; zukan(enegr,GO[vI,(mode=slcable|dspall,initid=*selected)); if(nowres);
#inpnum(mGO[vIn,4,(max=*enegr:*last,init=evf(*selected))); if(nowres);
#evflag(*selected,=,*64:nowval); evflag(instant2,=,*64:nowval);
#evflag(selectedenegr,=,evf(*selected));
evflag(*evarg:eneg,=,evf(*selected));
fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=*evf(*selected),btm=if)); fade(in2,); subevent(recover2,); return;
evflag(*selected,=,evf(*evarg:eneg));
next; endif;
wend;


#OύX
<changename>
#evflagsw(ex_changename,==,0); if(nowres); 
#text(1,face=uam,%nams[*name]ACRς悤BwłACR͏󋵂ɉđ悤B);
text(1,face=uam,%nams[*name]ACRς悤BACR͐}ӂɓo^Ă̂wł悤B);
# evflagsw(ex_changename,=,1); endif;
#select(reset,pos);
select(*mOނ̕ύXn(cid=,udev=@update_changename,dnev=@done_changename));


<update_changename>
#evflag(instant2,=,0);
select(+%nams[*name]ς(id=0,ic=nafuda));
select(+%nams[*name]߂(id=1,ic=nafuda));
select(+%nams[*name]KɌ߂(id=2,ic=nafuda,com=lȊȎS%nams[*name]_Ō߂܂B));
#Q[X^[gɍsAlȊȎS̃_ꊇēxs܂B
select(+%nams[*ruby]ς(id=3,ic=fukidashi));
select(+%nams[*ruby]߂(id=4,ic=fukidashi));
select(+%nams[*english]ς(id=5,ic=alpha));
select(+%nams[*english]߂(id=6,ic=alpha));
select(+%nams[*subname]ς(id=7,ic=trophy));
select(+%nams[*subname]߂(id=8,ic=trophy));
select(+ACRς(id=10,ic=none));
select(+ACR߂(id=11,ic=none));
select(+ACRύX(id=12,ic=none));
select(+Rgς(id=20,ic=paper));
select(+Rg߂(id=21,ic=paper));
select(+ip[eBjȂǂς(id=40));
#select(+(ic=close));
#select2(/instant2); 
#evflag(instant2,=,evf(*selected));


<done_changename>
if(evf(*selected)==0);
#selectmem(0);
while;
memslcbox(party,m%nams[*name]ςn,,,2); if(nowres);
#input(y%mem[s]z%nams[*name]ύX,%mem[s],0,0,);
member(select,name,input,(title=m%nams[*name]ςn\nu%mem[s]vˁuHHHHv,dfstr=%mem[s]));
#evtext(,input,m%nams[*name]ςn\nu%mem[s]vˁuHHHHv,%mem[s],0,,1); if(nowres); member(select,name,=,input); endif;
#member(name,select,=,);
#member(name,select,reset);
#member(name,flag,a,input);
#member(name,head,input);
#text(1,face=+select,%mem[s]u%nams[*name]ςv);
#text(1,face=+head,%mem[h]u%nams[*name]ςv);
next; wend;
#else; text(1,,%nams[*name]̕ύXIB);
#else; goto(2);
endif;
select(update); end; endif;

if(evf(*selected)==1);
while;
memslcbox(party,m%nams[*name]߂n,,,2); if(nowres); member(select,name,=,reset);
#text(1,face=+select,%mem[s]u%nams[*name]߂v);
#member(name,flag,Ԍa,reset);
#member(name,head,reset);
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==2);
text(1,(lwait=0,select=͂\n,islc=1),lȊȎS%nams[*name]%nams[*ruby]ύX܂B{ɕύX܂H);
if(evf(*selected)==0); subevent(randomname,);  text(1,,ύX܂B); else; text(1,,~܂B);
#memslcbox(party,m%nams[*name]KɕύXn,,,2); if(nowres); member(select,is,*l); if(nowres); text(1,face=+select,l%nams[*name]͎蓮ł肢܂Bm\{__\}m); else; subevent(randomname,); endif;
endif;
select(update); end; endif;

if(evf(*selected)==3);
while;
memslcbox(party:names:ruby,m%nams[*ruby]ςn,,,2); if(nowres);
member(select,subnames,ruby,input,(title=m%nams[*ruby]ςn\nu%mem[s].rubyvˁuHHHHv,dfstr=%mem[s].ruby,pageset=0));
#evtext(,input,m%nams[*ruby]ςn\nu%mem[s].rubyvˁuHHHHv,%mem[s].ruby,0,,1); if(nowres); member(select,ruby,=,input); endif;
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==4);
while;
memslcbox(party:names:ruby,m%nams[*ruby]߂n,,,2); if(nowres); member(select,subnames,ruby,=,reset);
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==5);
while;
memslcbox(party:names:english,m%nams[*english]ςn,,,2); if(nowres);
member(select,subnames,english,input,(title=m%nams[*english]ςn\nu%mem[s].sn[*english]vˁuHHHHv,dfstr=%mem[s].sn[*english],pageset=(1,2)));
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==6);
while;
memslcbox(party:names:english,m%nams[*english]߂n,,,2); if(nowres); member(select,subnames,english,=,reset);
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==7);
while;
memslcbox(party:names:subname,m%nams[*subname]ςn,,,2); if(nowres);
member(select,subnames,subname,input,(title=m%nams[*subname]ςn\nu%mem[s].sn[*subname]vˁuHHHHv,dfstr=%mem[s].sn[*subname]));
#evtext(,input,m%nams[*subname]ςn\nu%mem[s].snvˁuHHHHv,%mem[s].sn,0,,1); if(nowres); member(select,subnames,subname,=,input); endif;
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==8);
while;
memslcbox(party:names:subname,m%nams[*subname]߂n,,,2); if(nowres); member(select,subnames,subname,=,reset);
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==10);
while;
memslcbox(party,mACRςn,,,2); if(nowres);
evflag(instant1,=,mem(select,icon));
subevent(@selecticon,); if(nowres); member(select,icon,=,evf(instant1)); endif;
#text(1,face=+select,%memi[s]uACRݒ肵v);
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==11);
while;
memslcbox(party,mACR߂n,,,2); if(nowres); member(select,icon,=,mem(select,ini:icon));
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==12);
while;
memslcbox(party,mACRύXn,,,2); if(nowres); member(select, resetpic,32);
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==20);
#selectmem(0);
while;
memslcbox(party,mRgςn,,,2); if(nowres);
member(select,comment,input,(title=mRgςn,dfstr=%mem[s].com,maxlen=60));
#evtext(,input,mRgςn,%mem[s].com,0,60,1); if(nowres); member(select,comment,=,input); endif;
next; wend;
endif;
select(update); end; endif;

if(evf(*selected)==21);
while;
memslcbox(party,mRg߂n,,,2); if(nowres); member(select,comment,=,reset);
#text(1,face=+select,%mem[s]u%nams[*name]߂v);
#member(name,flag,Ԍa,reset);
#member(name,head,reset);
next; wend;
#else; goto(2);
endif;
select(update); end; endif;

if(evf(*selected)==40);
#evflag(instant2,=,0);
subevent(@changeptname,);
#evflag(instant2,=,9);
select(update); end; endif;

select(close);

#label(2); text(1,,%nams[*name]ύXȂB);

#member(name,flag,l,=,Ԃ); end;
#member(name,flag,Ԍ,=,);
#member(name,flag,̗d,=,);


#ύX
<changeptname>
#select(reset,pos);
select(*mȂǂςn(cid=,udev=@update_changeptname,dnev=@done_changeptname));


<update_changeptname>
select(+ς\{F%pty[e]\}(id=0,ic=nafuda));
select(+߂(id=1,ic=nafuda));
select(+%nams[*ruby]ς\{F%pty[e].ruby\}(id=2,ic=fukidashi));
select(+%nams[*ruby]߂(id=3,ic=fukidashi));
select(+%nams[*english]ς\{F%pty[e].sn[*english]\}(id=4,ic=alpha));
select(+%nams[*english]߂(id=5,ic=alpha));
select(+%nams[*subname]ς\{F%pty[e].sn[*subname]\}(id=6,ic=trophy));
select(+%nams[*subname]߂(id=7,ic=trophy));
select(+ACRς(id=14,ic=pt));
select(+ACR߂(id=15,ic=pt));
select(+Rgς(id=16,ic=paper,com=%pty[e].com));
select(+Rg߂(id=17,ic=paper,com=%pty[e].com));
#select(+(ic=close));
#select2(/instant2); 
#evflag(instant2,=,evf(*selected));


<done_changeptname>
if(evf(*selected)==0);
party(,name,input,(title=mςn\nu%pty[e]vˁuHHHHv,dfstr=%pty[e]));
#evtext(,input,mςn\nu%pty[e]vˁuHHHHv,%pty[e],0,,1); if(nowres); party(,name,=,input); endif;
select(update); end; endif;

if(evf(*selected)==1);
party(,name,=,reset);
select(update); end; endif;

if(evf(*selected)==2);
party(,subnames,ruby,input,(title=m%nams[*ruby]ςn\nu%pty[e].rubyvˁuHHHHv,dfstr=%pty[e].ruby,pageset=0));
#evtext(,input,m%nams[*ruby]ςn\nu%pty[e].rubyvˁuHHHHv,%pty[e].ruby,0,,1); if(nowres); party(,subnames,ruby,=,input); endif;
select(update); end; endif;

if(evf(*selected)==3);
party(,subnames,ruby,=,reset);
select(update); end; endif;

if(evf(*selected)==4);
party(,subnames,english,input,(title=m%nams[*english]ςn\nu%pty[e].sn[*english]vˁuHHHHv,dfstr=%pty[e].sn[*english],pageset=(1,2)));
select(update); end; endif;

if(evf(*selected)==5);
party(,subnames,english,=,reset);
select(update); end; endif;

if(evf(*selected)==6);
party(,subnames,subname,input,(title=m%nams[*subname]ςn\nu%pty[e].sn[*subname]vˁuHHHHv,dfstr=%pty[e].sn[*subname]));
select(update); end; endif;

if(evf(*selected)==7);
party(,subnames,subname,=,reset);
select(update); end; endif;

if(evf(*selected)==14);
evflag(instant1,=,party(,icon));
subevent(@selecticon,); if(nowres); party(,icon,=,evf(instant1)); endif;
select(update); end; endif;

if(evf(*selected)==15);
party(,icon,=,party(,ini:icon));
select(update); end; endif;

if(evf(*selected)==16);
party(,comment,input,(title=mRgςn,dfstr=%pty[e].com,maxlen=60));
#evtext(,input,mRgςn,%pty[e].com,0,60,1); if(nowres); party(,comment,=,input); endif;
select(update); end; endif;

if(evf(*selected)==17);
party(,comment,=,reset);
select(update); end; endif;

select(close);


#ACRI
<selecticon>
evflag(*selected,=,evf(instant1));
if(evf(*selected)==-1); evflag(*selected,=,id(-sysm:iconoff)); endif;
#evflagsw(debug_full,==,1); if(nowres); zukan(icon,ACRύX,(mode=slcable|dspall,initid=*selected,dspdetail=0)); else; zukan(icon,ACRύX,(mode=slcable,initid=*selected,dspdetail=0)); endif;
zukan(icon,ACRύX,(mode=slcable,initid=*selected,dspdetail=0,udev=@update_selecticon));
evflag(*selected,!=,-1); if(nowres);
evflag(instant1,=,evf(*selected));
#evflag(instant1,==,-3); if(nowres); evflag(instant1,=,-1); endif;
evflag(instant1,<,0); if(nowres); evflag(instant1,=,-1); endif;
true;
else;
false;
endif;


<update_selecticon>
select(adddtp,-sysm,iconoff,t3col|slcable|dspall);



#fUCނ̕ύX
<frame>
text(1,face=uam,eLXg{bNX̃fUCς悤B);

#CI
select(*mfUCނ̕ύXn(cid=,udev=@update_frame,dnev=@done_frame));

#Cxgϐp̃eXgp
#zukan(frame,t[ύX,(mode=slcable|dspall,dspdetail=0,dnev=@done_frame));


<update_frame>
select(+t[ύX(id=0,col=ffff00));
select(+{bNXwiFύX(id=1,col=00ff00));
select(+{bNXwi[hύX(id=2,col=00ffff));
select(+J[\ύX(id=3,col=c0c0ff));
select(+ύX(id=4,col=ff00ff));
select(+|[YTCύX(id=5,col=ff8000));
select(+ftHgɖ߂(id=10,col=ffff00));
#select(+(ic=close));


<done_frame>
#Cxgϐp̃eXgp
#text(0,eXg); fc(*target,apr,=,0);

#t[ύX
if(evf(*selected)==0);
zukan(frame,t[ύX,(mode=slcable|dspall,initid=*selected,dspdetail=0));
if(evf(*selected)>=0); frame(field,*selected); frame(current,*selected); endif;
end;
endif;

#t[ύXij
if(evf(*selected)==0);
select2(reset,all);
select2(adddtp,frame,default,);
select2(adddtp,frame,default0,);
select2(adddtp,frame,cylinder,);
select2(adddtp,frame,hashigo,);
select2(adddtp,frame,hashigo0,);
select2(adddtp,frame,cloud,);
select2(adddtp,frame,cloud0,);
select2(adddtp,frame,train,);
select2(adddtp,frame,needle,);
select2(adddtp,frame,needle0,);
select2(adddtp,frame,rainbow,);
#select2(+(ic=close));
while;
select2(*`t[ύX`(cid=));
if(evf(*selected)>=0); frame(field,*selected); frame(current,*selected); next; endif;
wend; select(update); end;
endif;

#{bNXwiFύX
if(evf(*selected)==1);
select2(reset,all);
select2(adddtp,picture,back1l,);
select2(adddtp,picture,back2l,);
select2(adddtp,picture,back3l,);
select2(adddtp,picture,back1,);
select2(adddtp,picture,back1d,);
select2(adddtp,picture,back2,);
select2(adddtp,picture,back3,);
#select2(+(ic=close));
while;
select2(*`{bNXwiFύX`(cid=));
if(evf(*selected)>=id(picture:back1)); boxcol(field,*selected,ffffff,ffff00,00ff80,00ffff,ff8000,000000,128,0); boxcol(current,*field,field,field,field,field,field,field,field,field); next; endif;
if(evf(*selected)>=0); boxcol(field,*selected,def,def,def,def,def,def,def,); boxcol(current,*field,field,field,field,field,field,field,field,field); next; endif;
wend; select(update); end;
endif;

#{bNXwi[hύX
if(evf(*selected)==2);
select2(reset,all);
select2(+LkiftHgj(id=0));
select2(+[v(id=1));
select2(+c[v(id=2));
select2(+[v(id=3));
#select2(+(ic=close));
while;
select2(*`{bNXwi[hύX`(cid=));
if(evf(*selected)==0); boxcol(field,*nochange,,,,,,,,0); boxcol(current,*nochange,,,,,,,,0); next; endif;
if(evf(*selected)==1); boxcol(field,*nochange,,,,,,,,1); boxcol(current,*nochange,,,,,,,,1); next; endif;
if(evf(*selected)==2); boxcol(field,*nochange,,,,,,,,2); boxcol(current,*nochange,,,,,,,,2); next; endif;
if(evf(*selected)==3); boxcol(field,*nochange,,,,,,,,3); boxcol(current,*nochange,,,,,,,,3); next; endif;
wend; select(update); end;
endif;

#J[\ύX
if(evf(*selected)==3);
select2(reset,all);
select2(adddtp,cursor,hkz,);
select2(adddtp,cursor,mutou,);
select2(adddtp,cursor,arrow1,);
select2(adddtp,cursor,arrow2,);
select2(adddtp,cursor,arrow3,);
#select2(+(ic=close));
while;
select2(*`J[\ύX`(cid=));
if(evf(*selected)>=0); cursor(field,, *selected); cursor(current,, *selected); next; endif;
wend; select(update); end;
endif;

#ύX
if(evf(*selected)==4);
select2(reset,all);
select2(adddtp,cursor,hkz,);
select2(adddtp,cursor,mutou,);
select2(adddtp,cursor,arrow1,);
select2(adddtp,cursor,arrow2,);
select2(adddtp,cursor,arrow3,);
#select2(+(ic=close));
while;
select2(*`ύX`(cols=1,arrowtest=1,cid=));
#\n%ct3g̉EɏoĂ܂%cd
if(evf(*selected)>=0); cursor(field,ar, *selected); cursor(current,ar, *selected); next; endif;
wend; select(update); end;
endif;

#|[YTCύX
if(evf(*selected)==5);
select2(reset,all);
select2(adddtp,cursor,hkz,);
select2(adddtp,cursor,mutou,);
select2(adddtp,cursor,arrow1,);
select2(adddtp,cursor,arrow2,);
select2(adddtp,cursor,arrow3,);
#select2(+(ic=close));
while;
select2(*`|[YTCύX`(cid=));
if(evf(*selected)>=0); cursor(field,ps, *selected); cursor(current,ps, *selected); text(1,cwait=0,ύX܂B); next; endif;
wend; select(update); end;
endif;

if(evf(*selected)==10);
frame(field,*def);
cursor(field,c, *def); cursor(field,ar, *def); cursor(field,ps, *def);
#boxcol(field,*def,def,def,def,def,def,def,def,);
frame(current,*def);
cursor(current,c, *def); cursor(current,ar, *def); cursor(current,ps, *def);
#boxcol(current,*def,def,def,def,def,def,def,def,def);
subevent(defboxcol,);
boxcol(current,*field,field,field,field,field,field,field,field,field);
end;
endif;

select(close);


#I}PXLKP
<skill_vala>
#text(1,face=uam,ɕς{͖B); end;
text(1,face=uam,w%it[*ꎫT].nmicxĂƁAI}PIȋZo悤B\n͂܂񁕖Y鎖\łB);

item(check:eq,ꎫT,1); or; item(check:eq,SȎT,1); if(nowres);
while;
memslcbox(party,mZ̏K^Ypn,,,2); if(nowres);
#evflag(sk_vala1,==,1,2,);
#evflag(sk_vala1,=,1);

#select2(reset,all); select2(+擪̂(id=0)); select2(+S(id=1); select2(+~); select2(*Z̏K^Yp(cid=));
member(select,skill,checkadd,u~Xg);
if(nowres); member(select,skill,lost,u~Xg); member(select,skill,lost,uCpNg); member(select,skill,lost,ŁXV[); member(select,skill,lost,ŁXXv[); member(select,skill,lost,Vh[N[);
text(1,face=uam,%mem[s]́w%sk[*u~Xg].nmicxw%sk[*uCpNg].nmicxw%sk[*ŁXV[].nmicxw%sk[*ŁXXv[].nmicxw%sk[*Vh[N[].nmicxYꂽB\nɂe܂ł͖܂B);
else; member(select,skill,get,u~Xg); member(select,skill,get,uCpNg); member(select,skill,get,ŁXV[); member(select,skill,get,ŁXXv[); member(select,skill,get,Vh[N[);
sound(warp); text(1,face=uam,%mem[s]́w%sk[*u~Xg].nmicxw%sk[*uCpNg].nmicxw%sk[*ŁXV[].nmicxw%sk[*ŁXXv[].nmicxw%sk[*Vh[N[].nmicxKI);
#\n擪̃o[ΏۂɂȂ܂
endif;

#member(skill,flag,l,checkadd,ojE~Xg,,3); member(skill,flag,l,checkadd,oCpNg); goto(1);
#label(3); member(skill,flag,l,get,ojE~Xg,ac2); member(skill,flag,l,get,oCpNg,ac1);
#text(1,face=uam,%mem[0]̓ojE~XgƃoCpNgKI); end;
#label(1); member(skill,flag,l,lost,ojE~Xg); member(skill,flag,l,lost,oCpNg);

#else; text(1,face=uam,w%it[*ꎫT].nmicxĂƁAI}PIȋZo悤B\n͂܂B);
#else; text(1,face=uam,I}PZo悤AKv炵B\n͂܂B);
#̋lĂȋCB
next;
endif;
wend;
endif;


#I}PXLKQ
<skill_coral>
#text(1,face=uam,ɕς{͖B); end;
text(1,face=uam,w%it[*aT].nmicxĂƁAI}PIȋZo悤B\n͂܂񁕖Y鎖\łB);

item(check:eq,aT,1); or; item(check:eq,SȎT,1); if(nowres);
while;
memslcbox(party,mZ̏K^Ypn,,,2); if(nowres);
member(select,skill,checkadd,gUh[);
if(nowres); member(select,skill,lost,gUh[); member(select,skill,lost,Wh[); member(select,skill,lost,ÂC); member(select,skill,lost,׊); member(select,skill,lost,CJX~);
#member(select,skill,lost,`[W);
text(1,face=uam,%mem[s]́w%sk[*gUh[].nmicxw%sk[*Wh[].nmicxw%sk[*ÂC].nmicxw%sk[*׊].nmicxw%sk[*CJX~].nmicxYꂽB\nɂe܂ł͖܂B);
#w%sk[*`[W].nmicx
else; member(select,skill,get,gUh[); member(select,skill,get,Wh[); member(select,skill,get,ÂC); member(select,skill,get,׊); member(select,skill,get,CJX~);
#member(select,skill,get,`[W);
sound(warp); text(1,face=uam,%mem[s]́w%sk[*gUh[].nmicxw%sk[*Wh[].nmicxw%sk[*ÂC].nmicxw%sk[*׊].nmicxw%sk[*CJX~].nmicxKI);
endif;
#else; text(1,face=uam,w%it[*aT].nmicxĂƁAI}PIȋZo悤B\n͂܂B);
#else; text(1,face=uam,I}PZo悤AKv炵B\n͂܂B);
#RR}`ۂ̂ĂȋCB
next;
endif;
wend;
endif;


#I}PXLKR
<skill_moon>
#text(1,face=uam,ɕς{͖B); end;
text(1,face=uam,w%it[*}].nmicxĂƁAI}PIȋZo悤B\n͂܂񁕖Y鎖\łB);

item(check:eq,},1); or; item(check:eq,SȎT,1); if(nowres);
while;
memslcbox(party,mZ̏K^Ypn,,,2); if(nowres);
member(select,skill,checkadd,e);
if(nowres); member(select,skill,lost,e); member(select,skill,lost,FHe); member(select,skill,lost,EChr); member(select,skill,lost,nP[r); member(select,skill,lost,gl[hr);
#member(select,skill,lost,˂); member(select,skill,lost,ԕ\e);
text(1,face=uam,%mem[s]́w%sk[*e].nmicxw%sk[*FHe].nmicxw%sk[*EChr].nmicxw%sk[*nP[r].nmicxw%sk[*gl[hr].nmicxYꂽB\nɂe܂ł͖܂B);
#w%sk[*˂].nmicxw%sk[*ԕ\e].nmicx
else; member(select,skill,get,e); member(select,skill,get,FHe); member(select,skill,get,EChr); member(select,skill,get,nP[r); member(select,skill,get,gl[hr);
#member(select,skill,get,˂); member(select,skill,get,ԕ\e);
sound(warp); text(1,face=uam,%mem[s]́w%sk[*e].nmicxw%sk[*FHe].nmicxw%sk[*EChr].nmicxw%sk[*nP[r].nmicxw%sk[*gl[hr].nmicxKI);
endif;
#else; text(1,face=uam,w%it[*}].nmicxĂƁAI}PIȋZo悤B\n͂܂B);
#else; text(1,face=uam,I}PZo悤AKv炵B\n͂܂B);
#Ȋ炪ĂȋCB
next;
endif;
wend;
endif;

#member(skill,flag,l,reset); end;
#member(skill,head,reset); end;

#member(skill,head,get,ŁXXv[,ac2,-1); member(skill,head,get,X,ac4,-1); member(skill,head,get,bELm,ac4,-1); end;

#member(skill,head,check,\a,1,-1,
#text(0,擪̃o[͏\aoĂȂB); goto(2);
#label(1); text(0,擪̃o[͏\aoĂB);
#label(2);

#member(skill,flag,̗d,get,Ή,ac1,-1);
#member(skill,head,get,AX^XN,ac3,-1);
#member(skill,head,lost,AX^XN,-1);
#member(skill,select,get,],rcv,-1);


#̉^
<unsei>
#text(1,,\\̉^\\%n);
select2(reset,all); select2(+肤(id=0,col=tu)); select2(/); select2(+|(col=td)); select2(*\\̉^\\(cid=));
#\niʂ͊SɃ_j
#\ng`勥܂12iK
if(evf(*selected)==0);
fade(out,(type=fade,color=ff0000,dep=128,wait=16)); fade(in,(type=fade,color=ff0000,dep=128,wait=16));
fade(out,(type=fade,color=00ff00,dep=128,wait=16)); fade(in,(type=fade,color=00ff00,dep=128,wait=16));
fade(out,(type=fade,color=0000ff,dep=128,wait=16)); fade(in,(type=fade,color=0000ff,dep=128,wait=16));
fade(out,(type=fade,color=ffff00,dep=128,wait=16)); fade(in,(type=fade,color=ffff00,dep=128,wait=16));
#rand(8,1,2,3,4,5,6,7,8);
evflag(*inmap:tlcount,>=,5); if(nowres); evflag(nowval,=,1); else; evflag(*inmap:tlcount,>=,4); if(nowres); evflag(nowval,=,12); else; rand(1,12); endif; endif;
#evflag(nowval,-=,*inmap:tlcount);
evflag(*inmap:tlcount,=,0);
evflag(nowval,==,1); if(nowres); text(0,w%ctug%cdxI\nî݂̒ł͍ōj); subevent(box_item(id(item:Q)),*null); end; endif;
evflag(nowval,==,2); if(nowres); text(0,w%ctug%cdxB\nʓIɁAgɎŉNǂ炵B); end; endif;
evflag(nowval,==,3); if(nowres); text(0,w%ctug%cdxB\nʓIɁAg艏Nǂ炵B); end; endif;
evflag(nowval,==,4); if(nowres); text(0,w%ctug%cdxB); end; endif;
evflag(nowval,==,5); if(nowres); text(0,w%ctug%cdxB\nʓIɁAgɂ͋y΂Ȃ\ng͉Nǂ炵B); end; endif;
evflag(nowval,==,6); if(nowres); text(0,w%ctug%cdxB); end; endif;
evflag(nowval,==,7); if(nowres); text(0,w%ctd%cdxcB\n̓}VȎ΁A\n勥ɎňƂB); end; endif;
evflag(nowval,==,8); if(nowres); text(0,w%ctd%cdxcB\nʓIɂ͂Ȃ舫ƂƂB); end; endif;
evflag(nowval,==,9); if(nowres); text(0,w%ctd%cdxcB); end; endif;
evflag(nowval,==,10); if(nowres); text(0,w%ctd%cdxcB\nʓIɁA艏N炵B); end; endif;
evflag(nowval,==,11); if(nowres); text(0,w%ctd%cdxcB); end; endif;
evflag(nowval,==,12); if(nowres); text(0,w%ctd勥%cdxcB\nî݂̒ł͍ŋj); party(,gold,>,0); if(nowres); party(,gold,-=,100); text(0,100~ƂĂ܂I); endif; end; endif;
#formem(party); member(select,pcond, cond,,+=,); nextmem(); text(0,SŏԂɂȂI); 
#\nʓIɁAg̕Nǂ炵B
#\nʓIɁAgɂ͋y΂Ȃg͉Nǂ炵B
#evflag(nowval,==,6); if(nowres); text(0,gB\nʓIɁAg̕Nǂ炵B); end; endif;
endif;
text(0,mʕǂ邳cB);


<tana>
text(1,face=uam,IB);


<senmen>
text(1,face=uam,ʑ䂾B);